DELUSER

 Function
  Flags the current user record for deletion.

 Syntax
  DELUSER   No arguments are required

 Remarks
  This statement will set the delete user record flag to TRUE.  This will
  merely flag PCBSystemManager to pack out the user during the next pack
  operation.  If you want to make sure the user doesn't log back in before
  being packed out, use GETUSER, set his U_SEC and U_EXPSEC variables to
  0, and use the PUTUSER statement to write the changes to the user record.

 Examples
  GETUSER
  IF (U_CMNT2 = "BAD USER") THEN
   PRINTLN "Just a friendly note to say,"
   PRINTLN "I hope you have a rotten day!"
   PRINTLN "Proceeding with automatic user record deletion..."
   DELUSER
   LET U_SEC = 0
   LET U_EXPSEC = 0
   PUTUSER
  ENDIF